home *** CD-ROM | disk | FTP | other *** search
/ Resource Library: Multimedia / Resource Library: Multimedia.iso / hypercrd / frtxt103.hqx / master FT v1.03 / Stack indexer_browser v.1.03 / cards.xml < prev    next >
Text File  |  1992-05-20  |  9KB  |  173 lines
  1. card_2966.xml
  2. <?xml version="1.0" encoding="utf-8" ?>
  3. <!DOCTYPE card PUBLIC "-//Apple, Inc.//DTD card V 2.0//EN" "" >
  4. <card>
  5.     <id>2966</id>
  6.     <filler1>0</filler1>
  7.     <cantDelete> <false /> </cantDelete>
  8.     <showPict> <true /> </showPict>
  9.     <dontSearch> <false /> </dontSearch>
  10.     <owner>2734</owner>
  11.     <link rel="stylesheet" type="text/css" href="stylesheet_6548.css" />
  12.     <content>
  13.         <layer>background</layer>
  14.         <id>46</id>
  15.         <text>HEADER and (GROUP or GROUPED)</text>
  16.     </content>
  17.     <content>
  18.         <layer>background</layer>
  19.         <id>45</id>
  20.         <text>not ART</text>
  21.     </content>
  22.     <name>FirstBrowserCard</name>
  23.     <script></script>
  24. </card>
  25.  
  26.  
  27. card_17566.xml
  28. <?xml version="1.0" encoding="utf-8" ?>
  29. <!DOCTYPE card PUBLIC "-//Apple, Inc.//DTD card V 2.0//EN" "" >
  30. <card>
  31.     <id>17566</id>
  32.     <filler1>0</filler1>
  33.     <cantDelete> <false /> </cantDelete>
  34.     <showPict> <true /> </showPict>
  35.     <dontSearch> <false /> </dontSearch>
  36.     <owner>3166</owner>
  37.     <link rel="stylesheet" type="text/css" href="stylesheet_6548.css" />
  38.     <part>
  39.         <id>2</id>
  40.         <type>button</type>
  41.         <visible> <true /> </visible>
  42.         <reserved5> 0 </reserved5>
  43.         <reserved4> 0 </reserved4>
  44.         <reserved3> 0 </reserved3>
  45.         <reserved2> 0 </reserved2>
  46.         <reserved1> 0 </reserved1>
  47.         <enabled> <true /> </enabled>
  48.         <rect>
  49.             <left>415</left>
  50.             <top>145</top>
  51.             <right>506</right>
  52.             <bottom>166</bottom>
  53.         </rect>
  54.         <style>roundrect</style>
  55.         <showName> <true /> </showName>
  56.         <highlight> <false /> </highlight>
  57.         <autoHighlight> <true /> </autoHighlight>
  58.         <sharedHighlight> <true /> </sharedHighlight>
  59.         <family>0</family>
  60.         <titleWidth>0</titleWidth>
  61.         <icon>0</icon>
  62.         <textAlign>right</textAlign>
  63.         <font>Geneva</font>
  64.         <textSize>10</textSize>
  65.         <textStyle>plain</textStyle>
  66.         <name>Index Tag File</name>
  67.         <script>on mouseUpset cursor to watchget indexFile()if char 1 of It is "{" then answer Itend mouseUp</script>
  68.     </part>
  69.     <part>
  70.         <id>3</id>
  71.         <type>button</type>
  72.         <visible> <true /> </visible>
  73.         <reserved5> 0 </reserved5>
  74.         <reserved4> 0 </reserved4>
  75.         <reserved3> 0 </reserved3>
  76.         <reserved2> 0 </reserved2>
  77.         <reserved1> 0 </reserved1>
  78.         <enabled> <true /> </enabled>
  79.         <rect>
  80.             <left>414</left>
  81.             <top>117</top>
  82.             <right>506</right>
  83.             <bottom>139</bottom>
  84.         </rect>
  85.         <style>roundrect</style>
  86.         <showName> <true /> </showName>
  87.         <highlight> <false /> </highlight>
  88.         <autoHighlight> <true /> </autoHighlight>
  89.         <sharedHighlight> <true /> </sharedHighlight>
  90.         <family>0</family>
  91.         <titleWidth>0</titleWidth>
  92.         <icon>0</icon>
  93.         <textAlign>right</textAlign>
  94.         <font>Geneva</font>
  95.         <textSize>10</textSize>
  96.         <textStyle>plain</textStyle>
  97.         <name>Create Tag File</name>
  98.         <script>on mouseUp-- export text data from all fields on all cards in chosen stacks-- tag the data with the name of the stack and the number of the card-- for use by a modified version of my indexer/browser...-- ┬⌐ Mark ^Zimmermann 1992 -- this is free software under GNU GPLput empty into tagFilerepeatanswer file "Please select a stack ..." of type STAKif It is empty then exit repeatput It into dbStackif tagFile is empty thenask file "Please name tag file..." with "Tag File"if It is empty then exit to HyperCardput It into tagFileopen file tagFileend if-- record where we are, then go to chosen stackpush cardgo to stack dbStack-- now loop over cards in the chosen stack-- output all the fields' contents, each followed by tags giving-- the stackname and card number in the format:---- {[(-- stackname-- cardnum--repeat with cardNum = 1 to the number of cardsset cursor to busygo to card cardNumput return & "                                      " & return & ┬¼"{[(" & return & dbStack & return & cardNum & return & ┬¼"                                      " & return into tagrepeat with fieldNum = 1 to the number of fieldswrite field fieldNum & return to file tagFilewrite tag to file tagFileend repeatrepeat with fieldNum = 1 to the number of card fieldswrite card field fieldNum & return to file tagFilewrite tag to file tagFileend repeatend repeatpop cardend repeatclose file tagFileend mouseUp</script>
  99.     </part>
  100.     <part>
  101.         <id>4</id>
  102.         <type>field</type>
  103.         <visible> <true /> </visible>
  104.         <dontWrap> <false /> </dontWrap>
  105.         <dontSearch> <false /> </dontSearch>
  106.         <sharedText> <false /> </sharedText>
  107.         <fixedLineHeight> <false /> </fixedLineHeight>
  108.         <autoTab> <false /> </autoTab>
  109.         <lockText> <true /> </lockText>
  110.         <rect>
  111.             <left>0</left>
  112.             <top>0</top>
  113.             <right>408</right>
  114.             <bottom>208</bottom>
  115.         </rect>
  116.         <style>scrolling</style>
  117.         <autoSelect> <false /> </autoSelect>
  118.         <showLines> <false /> </showLines>
  119.         <wideMargins> <true /> </wideMargins>
  120.         <multipleLines> <false /> </multipleLines>
  121.         <reservedFamily> 0 </reservedFamily>
  122.         <titleWidth>0</titleWidth>
  123.         <icon>0</icon>
  124.         <textAlign>left</textAlign>
  125.         <font>Geneva</font>
  126.         <textSize>12</textSize>
  127.         <textStyle>plain</textStyle>
  128.         <textHeight>16</textHeight>
  129.         <name>Info</name>
  130.         <script></script>
  131.     </part>
  132.     <part>
  133.         <id>5</id>
  134.         <type>button</type>
  135.         <visible> <true /> </visible>
  136.         <reserved5> 0 </reserved5>
  137.         <reserved4> 0 </reserved4>
  138.         <reserved3> 0 </reserved3>
  139.         <reserved2> 0 </reserved2>
  140.         <reserved1> 0 </reserved1>
  141.         <enabled> <true /> </enabled>
  142.         <rect>
  143.             <left>415</left>
  144.             <top>172</top>
  145.             <right>506</right>
  146.             <bottom>193</bottom>
  147.         </rect>
  148.         <style>roundrect</style>
  149.         <showName> <true /> </showName>
  150.         <highlight> <false /> </highlight>
  151.         <autoHighlight> <true /> </autoHighlight>
  152.         <sharedHighlight> <true /> </sharedHighlight>
  153.         <family>0</family>
  154.         <titleWidth>0</titleWidth>
  155.         <icon>0</icon>
  156.         <textAlign>right</textAlign>
  157.         <font>Geneva</font>
  158.         <textSize>10</textSize>
  159.         <textStyle>plain</textStyle>
  160.         <name>Browse Database</name>
  161.         <script>on mouseUpgo to next cardsend mouseUp to background button "Open"end mouseUp</script>
  162.     </part>
  163.     <content>
  164.         <layer>card</layer>
  165.         <id>4</id>
  166.         <text><span class="style8">         Free Text Stack Indexer/Browser  *** FOR EXPERIENCED FREE TEXT USERS ONLY! ***</span><span class="style3"></span><span class="style9">Purpose</span><span class="style3">:display Index and Context Views for text in HyperCard stacks, and jump with a click to the card in the original stack.</span><span class="style9">To Use</span><span class="style3">:ΓÇó click on ΓÇ£Create Tag FileΓÇ¥ and select the database stack to be indexed; then give the Tag File a name that you can remember is associated with the database; repeat for as many stacks as you wish to include; click ΓÇ£CancelΓÇ¥ when finished.ΓÇó click on ΓÇ£Index Tag FileΓÇ¥ and select the Tag File; please be patient!ΓÇó click on ΓÇ£Browse DatabaseΓÇ¥ (or go to the next card of this stack and click on the open book) and select the Tag File to browse, </span><span class="style9">Free Text</span><span class="style3"> fashion.ΓÇó scroll around in the Index and Context Views as you wish; click on a line of Context to see the card in the indexed stack where that line originally comes from.</span><span class="style9">Caveats/Bugs/Misfeatures</span><span class="style3">:ΓÇó if you rename or move or change the indexed stack, youΓÇÖll have to create a new Tag File and reindex itΓÇó the stack name (and words in the path to it on disk) and the card numbers appear in the index listΓÇó the highlighting of a target word doesn't always work right</span><span class="style9">NOTE</span><span class="style3">:  This is free software under the GNU General Public License and comes with NO WARRANTY whatsoever!  See the </span><span class="style9">Free Text</span><span class="style3"> stacks for complete documentation and license conditions.This stack should be distributed along with the main </span><span class="style9">Free Text</span><span class="style3"> indexer/browser stacks.  It is an experimental extension of </span><span class="style9">Free Text</span><span class="style3">, and uses the same compiled XFCNs as </span><span class="style9">Free Text</span><span class="style3"> ΓÇö the only changes are in the HyperTalk scripts.  Please use this as the starting point for your experiments in multi-stack databases!If you wish to contact me, you may write to:  Mark Zimmermann  P.O.Box 598  Kensington, MD  20895-0598  USAYou may contact me on the Internet at zimm@alumni.caltech.edu, or via CompuServe at [75066,2044].     ΓÇö ^z ΓÇö version 1.0 ΓÇö ┬⌐1990-92 ΓÇö Silver Spring, Maryland, USA ΓÇö</span></text>
  167.     </content>
  168.     <name></name>
  169.     <script></script>
  170. </card>
  171.  
  172.  
  173.